home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / asmutil / uasm.zip / 51VAL.MAC < prev    next >
Text File  |  1986-03-21  |  7KB  |  373 lines

  1. ;       ASM51 Validation File
  2. ;       15 June 1985
  3. *       Alternate Comment Line
  4. *
  5.         radix   16
  6.         nop                     ; No operands
  7. ;
  8.         ajmp    57              ; ajmp & jmp alternate forms
  9.         jmp     57
  10. ;
  11.         ljmp    5757
  12. ;
  13.         rr      a
  14. ;
  15.         inc     a
  16. ;
  17.         inc     55
  18. ;
  19.         inc     @r0
  20.         inc     @r1
  21. ;
  22.         inc     r0
  23.         inc     r1
  24.         inc     r2
  25.         inc     r3
  26.         inc     r4
  27.         inc     r5
  28.         inc     r6
  29.         inc     r7
  30. ;
  31.         jbc     55,20
  32.         bbc     55,20
  33. ;
  34.         acall   57
  35.         call    57
  36.         bsr     57
  37. ;
  38.         lcall   5757
  39. ;
  40.         rrc     a
  41. ;
  42.         dec     a
  43. ;
  44.         dec     55
  45. ;
  46.         dec     @r0
  47.         dec     @r1
  48. ;
  49.         dec     r0
  50.         dec     r1
  51.         dec     r2
  52.         dec     r3
  53.         dec     r4
  54.         dec     r5
  55.         dec     r6
  56.         dec     r7
  57. ;
  58.         jb      55,30
  59.         bb      55,30
  60. ;
  61.         ajmp    157
  62.         jmp     157
  63. ;
  64.         ret
  65. ;
  66.         rl      a
  67. ;
  68.         add     a,#88
  69.         add     a,88
  70.         add     a,@r0
  71.         add     a,@r1
  72.         add     a,r0
  73.         add     a,r1
  74.         add     a,r2
  75.         add     a,r3
  76.         add     a,r4
  77.         add     a,r5
  78.         add     a,r6
  79.         add     a,r7
  80. ;
  81.         jnb     55,50
  82.         bnb     55,50
  83. ;
  84.         acall   157
  85.         call    157
  86. ;
  87.         reti
  88. ;
  89.         rlc     a
  90. ;
  91.         addc    a,#88
  92.         addc    a,88
  93.         addc    a,@r0
  94.         addc    a,@r1
  95.         addc    a,r0
  96.         addc    a,r1
  97.         addc    a,r2
  98.         addc    a,r3
  99.         addc    a,r4
  100.         addc    a,r5
  101.         addc    a,r6
  102.         addc    a,r7
  103. ;
  104.         jc      70
  105.         bc      70
  106. ;
  107.         ajmp    257
  108.         jmp     257
  109. ;
  110.         orl     55,a
  111.         orl     55,#88
  112.         orl     a,#88
  113.         orl     a,88
  114.         orl     a,@r0
  115.         orl     a,@r1
  116.         orl     a,r0
  117.         orl     a,r1
  118.         orl     a,r2
  119.         orl     a,r3
  120.         orl     a,r4
  121.         orl     a,r5
  122.         orl     a,r6
  123.         orl     a,r7
  124. ;
  125.         jnc     90
  126.         bnc     90
  127. ;
  128.         acall   257
  129.         call    257
  130. ;
  131.         anl     55,a
  132.         anl     55,#88
  133.         anl     a,#88
  134.         anl     a,88
  135.         anl     a,@r0
  136.         anl     a,@r1
  137.         anl     a,r0
  138.         anl     a,r1
  139.         anl     a,r2
  140.         anl     a,r3
  141.         anl     a,r4
  142.         anl     a,r5
  143.         anl     a,r6
  144.         anl     a,r7
  145. ;
  146.         jz      0B0
  147.         bz      0B0
  148. ;
  149.         ajmp    357
  150.         jmp     357
  151. ;
  152.         xrl     55,a
  153.         xrl     55,#88
  154.         xrl     a,#88
  155.         xrl     a,88
  156.         xrl     a,@r0
  157.         xrl     a,@r1
  158.         xrl     a,r0
  159.         xrl     a,r1
  160.         xrl     a,r2
  161.         xrl     a,r3
  162.         xrl     a,r4
  163.         xrl     a,r5
  164.         xrl     a,r6
  165.         xrl     a,r7
  166. ;
  167.         jnz     0E0
  168.         bnz     0E0
  169. ;
  170.         acall   357
  171.         call    357
  172. ;
  173.         orl     c,55
  174. ;
  175.         jmp     @a+dptr
  176. ;
  177.         mov     a,#55
  178.         mov     55,#45
  179.         mov     @r0,#55
  180.         mov     @r1,#55
  181.         mov     r0,#55
  182.         mov     r1,#54
  183.         mov     r2,#53
  184.         mov     r3,#52
  185.         mov     r4,#51
  186.         mov     r5,#50
  187.         mov     r6,#4f
  188.         mov     r7,#4e
  189. ;
  190.         sjmp    140
  191.         br      140
  192. ;
  193.         ajmp    457
  194.         jmp     457
  195. ;
  196.         anl     c,55
  197. ;
  198.         movc    a,@a+pc
  199.         div     ab
  200. ;
  201.         mov     55,45
  202.         mov     55,@r0
  203.         mov     55,@r1
  204.         mov     55,r0
  205.         mov     55,r1
  206.         mov     55,r2
  207.         mov     55,r3
  208.         mov     55,r4
  209.         mov     55,r5
  210.         mov     55,r6
  211.         mov     55,r7
  212. ;
  213.         mov     dptr,#9876
  214. ;
  215.         acall   457
  216.         call    457
  217. ;
  218.         mov     55,c
  219. ;
  220.         movc    a,@a+dptr
  221. ;
  222.         subb    a,#88
  223.         subb    a,88
  224.         subb    a,@r0
  225.         subb    a,@r1
  226.         subb    a,r0
  227.         subb    a,r1
  228.         subb    a,r2
  229.         subb    a,r3
  230.         subb    a,r4
  231.         subb    a,r5
  232.         subb    a,r6
  233.         subb    a,r7
  234. ;
  235.         orl     c,/55
  236. ;
  237.         ajmp    557
  238.         jmp     557
  239. ;
  240.         mov     c,55
  241. ;
  242.         inc     dptr
  243. ;
  244.         mul     ab
  245. ;
  246. ;    reserved instruction @ A5
  247. ;
  248.         mov     @r0,55
  249.         mov     @r1,55
  250.         mov     r0,55
  251.         mov     r1,55
  252.         mov     r2,55
  253.         mov     r3,55
  254.         mov     r4,55
  255.         mov     r5,55
  256.         mov     r6,55
  257.         mov     r7,55
  258. ;
  259.         anl     c,/55
  260. ;
  261.         acall   557
  262.         call    557
  263. ;
  264.         cpl     55
  265.         cpl     c
  266. ;
  267.         cjne    a,#55,190
  268.         cjne    a,55,190
  269.         cjne    @r0,#55,190
  270.         cjne    @r1,#55,190
  271.         cjne    r0,#55,190
  272.         cjne    r1,#55,190
  273.         cjne    r2,#55,190
  274.         cjne    r3,#55,190
  275.         cjne    r4,#55,190
  276.         cjne    r5,#55,190
  277.         cjne    r6,#55,190
  278.         cjne    r7,#55,190
  279. ;
  280.         push    55
  281. ;
  282.         ajmp    657
  283.         jmp     657
  284. ;
  285.         clr     55
  286.         clr     c
  287. ;
  288.         swap    a
  289. ;
  290.         xch     a,88
  291.         xch     a,@r0
  292.         xch     a,@r1
  293.         xch     a,r0
  294.         xch     a,r1
  295.         xch     a,r2
  296.         xch     a,r3
  297.         xch     a,r4
  298.         xch     a,r5
  299.         xch     a,r6
  300.         xch     a,r7
  301. ;
  302.         pop     55
  303. ;
  304.         acall   667
  305.         call    667
  306. ;
  307.         setb    55
  308.         setb    c
  309. ;
  310.         da      a
  311. ;
  312.         djnz    55,1A0
  313. ;
  314.         xchd    a,@r0
  315.         xchd    a,@r1
  316. ;
  317.         djnz    r0,1C0
  318.         djnz    r1,1C0
  319.         djnz    r2,1C0
  320.         djnz    r3,1C0
  321.         djnz    r4,1C0
  322.         djnz    r5,1C0
  323.         djnz    r6,1C0
  324.         djnz    r7,1C0
  325. ;
  326.         movx    a,@dptr
  327. ;
  328.         ajmp    757
  329.         jmp     757
  330. ;
  331.         movx    a,@r0
  332.         movx    a,@r1
  333. ;
  334.         clr     a
  335. ;
  336.         mov     a,88
  337.         mov     a,@r0
  338.         mov     a,@r1
  339.         mov     a,r0
  340.         mov     a,r1
  341.         mov     a,r2
  342.         mov     a,r3
  343.         mov     a,r4
  344.         mov     a,r5
  345.         mov     a,r6
  346.         mov     a,r7
  347. ;
  348.         movx    @dptr,a
  349. ;
  350.         acall   757
  351.         call    757
  352. ;
  353.         movx    @r0,a
  354.         movx    @r1,a
  355. ;
  356.         cpl     a
  357. ;
  358.         mov     55,a
  359.         mov     @r0,a
  360.         mov     @r1,a
  361.         mov     r0,a
  362.         mov     r1,a
  363.         mov     r2,a
  364.         mov     r3,a
  365.         mov     r4,a
  366.         mov     r5,a
  367.         mov     r6,a
  368.         mov     r7,a
  369. ;
  370. ;    End of Validation Suite
  371. ;
  372.  
  373.